撰寫VBA程式時,時常要判斷一個變數是否沒有資料了,有時候這個變數為Null,有時候這個變數為字串但沒內容,但這不是Null,也有時候這個字串值,只有空格值,廣義的來說是沒有內容的,有時候判斷內容可能要多方考慮,把剛剛提到的都算成沒有資料,這時候如果要一個個打,實在太麻煩,因此筆者寫了個isNoting的Funcion來辨別a值是否沒有東西,這可省下不少的判斷式:
Function isNothing(a) As Boolean
'用來確定到底沒有有資料
On Error resume next
If IsNull(a) = True Then
isNothing = True
ElseIf Trim(a) = "" Then
isNothing = True
Else
isNothing = False
End If
End Function